home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet multimedia / Animacje, filmy i prezentacje / Modelowanie 3D / K-3D 0.6.5.0 / k3d-all-in-one-setup-0.6.5.0.exe / k3d-setup-0.6.5.0.exe / share / lsystem / abop-compound-leave-3d.ls < prev    next >
Encoding:
Text File  |  2005-02-12  |  216 b   |  19 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 29
  3. 5
  4. 10
  5. #
  6. &(90)+(90)a
  7. #
  8. a=F[+(45)l][-(45)l]^;a
  9. #            apical delay
  10. l=j
  11. j=h
  12. h=s
  13. s=d
  14. d=x
  15. x=a
  16. #
  17. F='(1.17)F'(.855)    # internode elongation rate
  18. @
  19.